mas :: Int -> Int -> Int
mas m n = m + n

suma_par m n = (even . mas m) n


multThree :: (Num a) => a -> a -> a -> a
multThree x y z = x * y * z